* lisp/emacs-lisp/comp.el (comp-final): Clean-up temporary file.

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 59e9dbc01382bfd4cb2ccf250ba392b0d660ca81..213eb7b4126e1a05c56e7ab187161ae8d9a5389e 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3666,7 +3666,9 @@ Prepare every function for final compilation and drive the C back-end."
                    (call-process (expand-file-name invocation-name
                                                    invocation-directory)
                                 nil t t "--batch" "-l" temp-file))
-                  output
+                  (progn
+                    (delete-file temp-file)
+                    output)
                (signal 'native-compiler-error (buffer-string)))
             (comp-log-to-buffer (buffer-string))))))))